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PARTE Ill — COMO FUNCIONA O Z80 


4.3. — As mnemónicas do z80 (Continuação) 


3.º Subgrupo As instruções DEC 
DEC A 61 
DEC H 37 
DEC L 45 
DEC B 2 
DEC C 13 
DEC D 21 
DEC E 29 

DEC (HL) 53 

- dEC (|X+d) 221, 531 +d 
DEC (IY + d) 253, 53 +d 
DEC HL 43 
DEC BC 11 
DEC DE 27 
DEC SP 59 
DEC IX 221, 43 
DEC IY 253, 43 


Tal como as instruções INC (Grupo 6), as DEC são muito 
utilizadas quando se trabalha com contadores do tipo FOR- 
NEXT ou com registros apontadores. Elas afectam todos os 
flags, com excepção do carry. Serão fornecidos ao leitor de- 
talhes sobre a movimentação desses flags quando abordar- 
mos os contadores. 

Os tempos de execução das instruções DEC são idênticos às 
INC (ver grupo 6). 

As instruções DEC (HL), DEC (IX + d) e DEC (IY + d), sub- 
traem uma unidade (1) ao conteúdo do endereço memoriza- 
jo por qualquer destes registros. As restantes subtraiem 1 ao 
número memorizado pelo respectivo registro. 

A diferença entre estes dois tipos de instruções situa-se no 
uso do parêntesis. 

Como existem instruções para decrementar individualmente 


cada uma das células dum registro par, executando a instru- - 


ção DEC sobre o byte mais significativo, podemos obter 
saltos de 256 unidades para trás. (Ver ensaio 2). Poderemos 
ver a utilidade destes saltos, quer para a frente INC, quer 
para trás DEC, quando trabalharmos com blocos de dados 
de extensão inferior ou igual a 255 bytes. 


Ensaio 1: Decremento de N (N-1) 


LD BC, 256 1, 0, 1 
DEC BC 11 
RET 201 


PRINT USR X (Resultado: 255) 


Ensaio 2: Decremento de N (N — 256) 


(Cont. dos números anteriores) 


LD BC, 511 testo 1 
DEC B 
RET 201 


PRINT USR X (Resultado: 255) 


Ensaio 3: Decremento do conteúdo dum endereço 


LD HL, 28020 33, 116, 109 
LD (HL), 200 54, 200 
DEC (HL) 53 
RET 


RANDOMIZE USR X 
PRINT PEEK 28020 (Resultado: 199) 


Grupo 8 — As instruções de comparação 


As instruções deste grupo são frequentemente usadas na 
programação em C/M. Elas permitem comparar um dado 
+ N, conteúdo dum registro, ou o conteúdo dum endereço da 
memória, com o valor fixado no registro A. 

A comparação efectua uma operação de subtracção cujo re- 
sultado vai afectar o estado dos flags, mas que não altera o 
conteúdo de A. 

Em certa medida este tipo de instrução compara-se ao co- 
mando Basic IF, pois ao aplicá-la é implícito o uso de outro 
tipo de instrução que obrigue o Z80 a uma opção. Esta é 
tomada (seja ela qual for) com base no estado dos flags 
Carry e Zero. 


Para o resultado duma instrução de comparação: 


a) igual a zero — Flag Z=i1 

b) <> dezero— » Z=0 

Cc) p= a zero — » C=0 

d) < que zero — » C=1 

Mnemónicas Códigos 
CP +N 254, + N 
CP A 191 

CP H 188 
CPL 189 

CP B 184 

CP C 185 

CP D 186 
CRE 187 

CP (HL) 190 

CP (IX + d) 221, 190, + d 
CP (ly + d) 253, 190, + d 


Falarmos sobre o tempo de execução destas instruções não 
tem significado lógico, pois não existe alternativa para elas. 


= EEE AAA e me 


GD a E 


Para compararmos o conteúdo do registro A com qualquer 
outro valor, este é o processo mais rápido e eficiente. 
Existe ainda outro tipo de instruções de comparação (execu- 
tado em bloco), que serão examinadas noutro grupo. 


GRUPO 9 — As instruções lógicas 


Em C/M existem 3 tipos fundamentais de instruções lógicas 
(AND, OR, XOR). Elas são executadas entre o conteúdo do 
registro A e um byte específico, tal como, um comando direc- 
to (byte seguinte à instrução lógica, denominado + N), um 
valor fixado num registro ou ainda o conteúdo dum endereço 


de memória apontado por um registro. Estas instruções obri- | 


gam o Z80 a operações bit a bit, sendo O resultado dessas 8 
operações distintas devolvido ao registro A. 


Subgrupo A — Instruções AND 


A operação AND determina que o bit resultante do teste entre 
2 bits, seja 1 (Set) apenas quando ambos tiveram o valor 1. 

Nas outras 3 hipóteses resultantes, (0 com 1), (1 com 0) ou 
(O com 0) o resultado será O (reset). 


EXEMPLO (em binário) 


10101010 conteúdo do registro A 
AND... 

11000000 o outro valor... 
Resultado 

10000000 valor devolvido a A. 


A instrução AND A, que não altera o conteúdo de A, é muitas 
vezes usada (já o temos feito) para colocar a zero o Carry 
flag. 


Mnemónicas Códigos 
AND + N 230, + N 
AND A 167 
AND H 164 
AND L 165 
AND B 160 
AND C 161 

AND D | 162 
AND E 163 
AND (HL) 166 
AND (IX + d) 221, 166, + d 
AND (IY + d) 253, 166, + d 


O exemplo que segue é extraído da ROM do ZX81. A instru- 
ção AND + N vai ser usada para mascarar de zero, 2 bits do 
conteúdo de A. 

A tabela das palavras chaves que se encontra nos endereços 
(273 a 507) tem memorizadas todas as palavras que se en- 
contram no teclado. A última letra de cada uma está em in- 
verso de vídeo, com a finalidade de servir de separador. 


EXEMPLO: Palavra LIST 


Endereços Códigos Letras 
431 49 L 
432 46 | 
433 56 | S 
434 185 


A rotina «Escreve uma palavra chave» começa por pesquisar 
a 1.º letra da palavra, movendo o apontador (que neste caso 
é o registro BC) para o endereço 431; imprime todas as letras 
regulares (ou seja 0 L, |, S); decodifica o T em inverso de 
vídeo; imprime o T normal e efectua o retorno. 


Resumindo: 


Cada letra é AND com o binário 00111111 que não altera o 
código destas, mas mascara de zero a inversão de vídeo, 
transformando-a num código de letra normal. 
No ZX81..0 código de letra em inversão de vídeo, 
transformarido-a num código de letra normal. 


A operação AND, sobre as 4 letras: 


Código 49 — 00110001 AND 00111111 = 00110001 
» 46 — 00101110 AND 00111111 = 00101110 
» 56 — 00111000 AND 00111111 = 00111000 
» 185 — 10111001 AND 00111111 = 00111001 


ma 


4 


Após executada a instrução AND, cada letra é enviada ao 
impressor de caracteres (outra rotina da ROM) e o retorno é 
efectuado para dentro da nossa rotina «Escreve uma pala- 
vra/chave», aonde de novo o registro A vai ser carregado 
pelo código da letra apontada por BC, para ser testada se é 
ou não a última da palavra. 

Este teste é executado dobrando o Código da letra, que 
sendo normal dá Carry (0) e, em inverso de video, Carry (1). 
Se Carry = 1, a rotina efectua o retorno, porque a palavra já 
foi totalmente impressa. 

Se Carry = 0, efectua-se um salto para o início da rotina, a 
fim de transportar a letra seguinte. 


Endereços Códigos  Mnemónicas Comentários 
2393 10 LD A, (BC) cópia da letra 
2394/5 230,63 AND + 63 mascara os últi- 

ed mos 2 bits 
2396 - Salto para a rotina impressora de caractereç — 
2397 10 LD A, (BC) volta a copiar a 
letra 
2398 3 INC BC aponta a letra 
j seguinte 
2399 135 ADD A, A 2 * o código 


Salto para 2393, se Carry (0) 
Retorno se Carry (1) 


ENSAIO 1: (Spectrum) a utilização duma instrução AND para 
mascarar os bits que os atributos dão a cor do papel e da 
tinta. 


Vamos usar um contador em Basic, que executará uma pe- 
quena rotina em C/M. 


RAM TOP em 27999 


Endereços Mnemónicas Códigos Comentários 


28000/2 LD A, (28020) 58,116, 109 coloca em A o 
atributo 


CLUBE Zso 3 
28003/4 AND + 241  230,241 máscara dos Atributo inicial BIN 00101000 
bits 1,2,3€e 4 (Papel CYAN/preta) 
28005/6 ADD + 16 198, 16 mudança das AND + 241 11110001 
| cores 
28007/9 LD (28020), A 50,116,109 envia atributo 00100000 
modificado ADD + 16 00010000 
RSGAO 1, ni Atributo final 00110000 
BASIC: (Papel amarelo e tinta preta) 
IG: Atributo inicial para as letras 10101110 
Papel CYAN e tinta amarela, em flash 
10 BORDER 5: PAPER 5: INK O: CLS Va a gd à: 
AND + 241 11110001 
20 PRINT AT 10, 7; FLASH 1; INK 6; «ENSAIO AND» | 
40 FOR N = 22528 TO 23295 : REM AREA ATRIBUTOS 10100000 
50 POKE 28020, PEEK N | 
ADD + 16 00010000 
60 RANDOMIZE USR 28000 | 
cio Atributo final das letras 10110000 


80 NEXT N 


As cores do écran são mudadas de papel azul claro e tinta 
preta para amarelo e azul respectivamente. 


(Papel amarelo e tinta preta em flash) 


(Continua no próximo número) 


Autor: Alexandre Sousa 


Iniciamos no número anterior o esboço de explicação dos di- 
ferentes métodos de implementar o interface ou seja o circui- 
to de ligação entre os diferentes sectores de um compu- 
tador. 
No sistema em que é usado o método MEMORY-MAPPED 
1/O o interface comunica com o processador através do BUS 
da memória. Como resultado, o processador deixa menos 
espaço disponível para o utilizador, mas em contrapartida 
não necessita de instruções especiais para as entradas e 
saídas (1/0). 
No segundo método de implementar um sistema de 1/O, cria- 
mos um BUS completamente novo, a que chamamos |/O 
BUS, o qual se parece com o Memory BUS. 
O bus de entrada/saída (1/O bus) tem um bus de endereço 
amado peripheral-address bus (barramento de endereça- 
ento dos periféricos) de modo a ser distinguido do barra- 
mento de endereçamento da memória. 
Tem também um segundo conjunto de linhas de dados e um 
barramento de controlo de periféricos. 


BUS /MEMORIA e 10 BUS periferico 


Os sinais no |/O bus podem ou não, ser parecidos com os do 
bus de memória. Este sistema tem a vantagem de possuir 
uma capacidade completa em termos do uso da memoria, 
mas tem a desvantagem de necessitar de um conjunto de 
instruções adicional chamado I/O instructions, um segundo 
barramento (1/0 bus) também é considerado como 
desvantagem. 


OBSERVAÇÃO: Um BUS ou BARRAMENTO não é mais do que um conjunto 
de linhas, através do qual se estabelecem as ligações entre 
dois circuitos electrónicos. 


Devemos fazer uma breve pausa e passar uma vista de 
olhos pelo conjunto de instruções do processador. 

O grupo principal que é denominado INSTRUÇÕES MÁQUI- 
NA, contém as instruções de manejo dos |/O e de referência 


“à memória. 


Esta classe de instruções controla (ao mais baixo nível) as 
operações do computador. Cada instrução pode iniciar ape- 
nas uma tarefa simples, tal como: obter um bit de informação 
a partir da memória ou endereçar uma linha de Entrada/Saí- 
da, ou ainda enviar um caracter para um dos dispositivos 
periféricos. 

Aos programadores, está reservada a tarefa árdua, de resol- 
ver todos os problemas ligados ao projecto de programas a 
este nível de complexidade (programas em linguagem 
máquina). 

Claro que o fabricante, dispõe sempre (para seu uso e dos 
programadores) de instrumentos — Sistemas Operativos — 
que propiciam um novo conjunto de operações com outro ni- 
vel de potência. 

Esse novo conjunto de instruções, denomina-se LINGUA- 
GEM DE ALTO NÍVEL, porque essas instruções, agora refe- 
ridas como ENUNCIADOS permitem programar ao mais alto 
nível (próximo à linguagem humana). 


SINAIS DIGITAIS 


Ao abordarmos esta discussão inicial, deixarmos claro (supo- 
mos) que no conjunto de linhas chamado BUS ou BARRA- 
MENTO, circulam sinais, remetidos pelo processador e pelos 
outros componentes do sistema. Em qualquer linha do BUS 
podem ser medidos essas diferenças de tensão ou esses flu- 
xos de corrente. 

Um sinal que esteja presente num condutor, manifesta a sua 
existência pela presença ou ausência de tensão ou fluxo de 
corrente. 

Será portanto o que designamos por SINAL DIGITAL ou Bl- 


IDE LZMMNIRITSTOyZBooABc .e:x 1. 


NÁRIO porque ele assume sempre dois estados: PRESENTE 
ou AUSENTE. 

Se tratamos de sinais relacionados por diferenças de tensão, 
existirá ou não essa diferença de tensão. A medida da voita- 
gem será de K volts ou ZERO volts. As tensões são medidas 
em referência a um ponto zero, usualmente referido como 
GROUND ou MASSA ou TERRA, que não é mais do que um 
fio condutor comum a todos os circuitos e componentes exis- 
tentes no sistema. 

Os sinais binários ou digitais, são o meio primário de comuni- 
cação nos sistemas computadorizados, porque os circuitos 
de detecção ou os que geram os sinais binários, são simples 
de construir ou montar. 

O que chamamos BUS não é mais do que um conjunto de 
fios condutores nos quais podem circular sinais digitais, dos 
quais o mais comum é conhecido como TTL (transistor-tran- 
sístor-logic). Esta família de circuitos constitui um conjunto de 
blocos presentes em todos os computadores. 

Estes circuitos não só definem a presença ou ausência de 
sinais binários como também definem os níveis ou regiões 
desses sinais. 


Sinal 1 ou nível Alto ....... 2 as vols .::.. High 
Sinal O ou nível Baixo ..... 0:8-a 2 volts .-... Low 
Sinal não definido ......... O a 0.8 volts 


Da mesma forma que possuimos circuitos para permitir a re- 
cepção ou envio de sinais a determinados níveis, também 
temos circuitos para transmitir sinais. 

A tarefa principal dos circuitos do |/O é a de converter os 
níveis de sinal usados numa zona do sistema, noutro nível 
diferente, usado por outra zona. Por exemplo, os sinais usa- 


dos nos sistemas de comunicações não são do mesmo nível 
que os sinais usados no processador. 


REPRESENTAÇÃO DOS DADOS 


Após o estabelecimento dos níveis dos sihais, precisamos de 
estabelecer o acordo sobre a representação dos vários 
sinais. 

Qual a representação digital do caracter «A» ou do número 
«27»? 

O alfabeto pode assumir 26 valores. Os numerais podem as- 
sumir um número infinito de valores. Como podemos repre- 
sentar todos estes valores apenas com O e 1 ou ON/OFF? 
A resposta é a de que devemos usar mais do que uma linha 
de sinal, ou seja iremos criar um BUS. Se possuimos 8 lIi- 
nhas, cada uma das quais podem assumir dois níveis, pode- 
remos representar 2 elevado à oitava potência ou seja 256 
valores. 


16 LINHAS -DADOS 


ESB: 
STROBE b 


1/0 (DIR. dos dados) 


COMPUTADOR INTERFACE 


STATUS 


6 LINHAS para 
endereçar o periferico 


Adapt.: J. MAGALHÃES/Clube Z80 


ROTINA 1 — Ordenação alfabética/numérica 


Agora, com esta rotina, pode ordenar o seu ficheiro por or- 
dem alfabética e num período de tempo muito inferior aquele 
ocupado por qualquer outra em BASIC. Observe a figura 1 e 
compare os tempos. 


(10,10) 
(25,25) 


(50,50) 
(10,50) 
(200,6) 
(10,20) 
(100,100) 


FIGURA 1 — Tabela de tempos 


A rotina ocupa 138 bytes de memória e pode ser colocada 
em qualquer posição. Geralmente, este género de rotinas 


funciona no «buffer» da Printer e, no caso de a desejar aí, 


lembre-se que tem de ficar no endereço além de 23310; as- 


sim, como sabe, não poderá usar instruções como LPRINT, 
COPY ou LLIST, pois elas fariam desaparecer a rotina. 
Depois de introduzida a rotina (fig. 2), grave-a para evitar” 
introduzi-la de novo em caso de erro, e então faça RUN. 6 
código é posicionado (POKED) na memória, no endereço es- 
pecificado na linha 10. Se pretender outra posição de memó- 
ria, basta alterar a linha 10 antes de fazer RUN. 


26 LET'S =40008 


30 FOR f=a TO a+135: 
42,93,92,2290,33,4,91,3 
4,93,92,54,100,35,54,36,205 
110 DATA 178,40,68,77,225,34,93 
.92,48,2,207,1,96,1095,203, 126 
120 DATA 40,248,35,35,35,562,2,1 
20,40,2,207,2,35,94,35,85,35,35 
130 DATA 175,190,32,244,43,126, 
35,35,50,19,91,34,4,91,6,0,79,9 
1áQ DATA 34,6,91,27,66,75,237,6 
7 48491,197 42,4,91,237,91,6,91 
150 DATA 237,75,8,91,197,229,21 
3,58,10,91,71,26,100,532,5,35,19 
| 160 DATA 16,248,175,209,225,55, 
19,91,71,48 5,78,26,119,121,18 
170 DATA 35,19,156,945,193,11,12 
O,1272,92,217,195,11,126,129,52,1 


FIGURA 2 — Rotina 


CLUBE Zso > 
Para usar esta rotina, os seus dados terão de entrar sob a ERROS: 
forma de ARRAY D$. Este array deve ter 2 subscritos: D$ (a, «Variable not found» — Este erro pode ocorrer quando D$ 


D,), em que «a» corresponde ao número de subscritos (nú- 
mero das diferentes strings contidas no array) e «b» corres- 
ponde ao comprimento de cada subscrito. Este valor (de b) 
não deve exceder 255. 


não existe na memória. «Subscript Wrong» — Se D$ está em 
memória, mas não dimensionado correctamente, como no 
exemplo D$ (4) ou D$ (4, 2, 2). 


NOTA: Para ordenação numérica, deverá fazer um «loop» de modo a conver- 
ter o array numérico numa string. 


1.00 REM start 4704 REM 
116 REM org 44000 480 REM 
126 REM frtaz 490 REM 
130 REM equ 23396 FIRST 00 REM 
146 REM equ 23362 SECOND via REM 
150 REM equ 23384 LOOP 20 REM 
160 REM equ 23306  SUB-LEN SG REM 
176 REM equ 236981 STATUS 540 REM 
180 REM equ 23645 - CH-ADD IO REM 
190 REM equ &28E2 LODK-VARS 60 REM 
200 REM 70 REM 
21% REM ld h1, (CH-ADD) S86 REM 
220 REM push hl 3920 REM 
230 REM ld h1I,FIRST 600 REM 
246 REM ld (CH-ADD),hl 610 REM 
2540 REM ld (hl),1005"d” 626 REM 
260 REM inc hl 630 REM 
276 REM ld (h1l),365'4%" 640 REM 
280 REM call LODK-VARS 654 REM 
290 REM ld b,h 660 REM 
Z00 REM Id 'csl &7% REM 
Sia REM pop hl 630 REM 
326 KEM ld (CH-ADD),hl] 69% REM 
J36 REM jr nc, FOUND 700 REM 
342 REM NOT-FOUND; 710 REM 
J59 REM rst 8 720 REM 
360 REM datab &01 734 REM 
376 REM FOUNDS 746 REM 
380 REM ld h,b 756 REM 
390 REM ld 1,c 760 REM 
400 REM bit 7, (hl) 776 REM 
416 REM jr z,NOT-FOUND 780 REM 
420 REM inc hl 796 REM 
4304 REM inc hl 820 REM 
440 REM inc hl 816 REM 
456 REM ld a,2 B20 REM 
4606 REM cp thl) BxaG REM 


jr z,s IN-RANGE. 840 REM ld a, (SUB-LEN) 
ERRORS 8302 REM ld b,a 
rat 8 860 REM LOOP-Cs 
datab &02 8704 REM ld a, (de) 
IN-RANGE; 889 REM cp th1) 
inc hl 890 REM jr nz,CONT 
ld es thl) 700 REM inc hl 
inc hl - 914 REM inc de 
ld de hi): 920 REM djnz LOOP-C 
int. bl Ss PIO REM xor a 
inc hl 940 REM CONT 
xor a 996 REM pop de 
cp <hl) 960 REM pop hl . 
ir nz, ERROR 976 REM ld a, (SUB-LEN) 
dec hl 940 REM ld b,a 
ld a, thl»> -— 994 REM LOOP-Is 
inc hr: 1092 REM jr nc, NO-SWAP 
inc hl iglia REM Id c, thl) 
ld (BUB-LEN)D a 1020 REM ld a, (de)" 
1d <FIRST)ahd joSo REM ld (hl),a 
ld b,0 iv4a REM ld a,c 
ld c,a iÍo5o REM ld (de),a 
ld (SECOND), hl 1470 REM ínc hl 
dec de 1080 REM ínc de 
Id b,d JoSo REM djnz LOOP-I 
ld c,e 1100 REM pop be 
ld (LOOP), be 1114 REM dec bc 
LOOP-AS 11220 REM ld a,b 
push bc 1134 REM or c 
ld h1, (FIRST) 1144 REM jr nz.LO0OP-ER 
ld de, (SECOND) 1i%0 REM pop bc 
ld be, (LOOP) 11640 REM dec bc 
LOOP-RS 1174 REM ld a,.b 
push bc 1189 REM or c 
push hl JiV4 REM yr nz, LOOP-A 
push de i200 REM ret 

1210 REM end 


FIGURA 3 — A mesma rotina «disassembled» 


ROTINA 2 — Movimentos suaves 


(in. YOUR COMPUTER, n.º 7, Setembro/84) 


É apresentada aqui uma pequena rotina em cód. máq. que 
proporciona movimentos mais suaves sem sofrer as restri- 
ções da grelha de caracteres do Spectrum. 


Gráficos e caracteres ASCII podem ser posicionados em 
qualquer coordenada de alta resolução com um simples co- 
mando BASIC. Você não fica limitado às 704 posições 
PRINT (0 - 21 linhas e O — 31 colunas), podendo posicionar 
os caracteres em qualquer ponto da grelha de alta resolução 
256/176. 


O programa utiliza apenas 120 bytes de memória, sendo 
completamente re-colocáveis, o que significa que você pode 


carregá-los em qualquer posição de memória. 


Funciona sem quaisquer problemas no 16 K. 


Outra vantagem em relação ao comando PRINT AT é que 
este permite-lhe usar mais 90 gráficos UDG *, a somar aos 
21 (códigos 144-164). 

Em suma, com esta rotina pode definir e posicionar caracte- 
res de 165 a 255. 


COMO CARREGAR A ROTINA? 
(listagem 2) 


A primeira parte, em BASIC, carregará o código máquina em 
qualquer posição de memória. 

Introduza a listagem cuidadosamente (atenção às linhas DA- 
TA!). No Spectrum 48 K pode colocar o código, por exemplo, 
no endereço 64500. Faça CLEAR 64499, para dizer ao BA- 
SIC que não deve usar endereços superiores a 64499, e en- 
tão RUN. 


* UDG — User Defined Graphics (gráficos definidos pelo utilizador). 


di ci ce e e rp ra e 
É SS EEU SE E EE EE TETE CLUBE Zso 


RES ns 


Or [JJQÕ ]JhJíJIlÃíÃiãõãõíõíõííÃ..... e 


Introduza 64500 no endereço de carregamento. O programa 
«lê» as linhas DATA e doloca-as no endereço corres- 
pondente. 


Se ocorreu qualquer erro (na introdução dos DATA), ser-lhe- 
-á dada uma mensagem; corrija o erro e faça RUN de novo. 
Não teste a rotina antes de aparecer a mensagem: «Posição 
do caracter...» O código agora está pronto para ser usado. É 
boa ideia fazer uso dos dois comandos SAVE gravando toda 
a rotina e o código máquina separadamente, pois facilitará O 
trabalho em caso de erro. 


No Spectrum 16 K (partindo do princípio de que não tem có- 
digo máquina na memória), introduza o código máquina no 
endereço 31670. Faça CLEAR 31669 e então especifique O 
endereço para carregamento — 31670. É claro que o pode 
colocar noutra posição; no entanto não se esqueça de o pro- 
teger com o respectivo comando CLEAR. 


A rotina possui um comando numa versão de Alta Resolução, 
que substitui. 


PRINT INK 8; PAPER 8; OVER 1; AT Y; X; CHR$ c 
por 
RANDOMIZE X AND Y = C+ USR a 


onde «x» e «y» são as coordenadas horizontal e vertical do 
canto superior esquerdo do caracter; «C» é o código ASCII do 
caracter e «a» o endereço onde foi colocado o código máqui- 
na. Então 


RANDOMIZE O AND 175 = 65 + USR 64500 


posicionará a letra «A» (caracter 65) no canto superior es- 
querdo do écran — partindo do princípio de que o cód. máa. 
foi colocado no endereço 64500. O RANDOMIZE é uma «si- 
mulação» («dummy» no original) para guardar o resultado da 
chamada USR. Se no seu programa usa números «RAN- 
DOM», deve alterar RANDOMIZE por uma variável de trans- 
ferência («dummy»), tal como 


LET dummy = O AND 175 = 65 + USR 64500 


Pode especificar as coordenadas ou os códigos do carácter 
com expressões tais como as variáveis ou números. Por 
exemplo: 


RANDOMIZE xpos + xdir AND ypos — ydir = CODE 
«*» + USR move 


Na rotina é usada uma técnica muito simples para conseguir 
as 3 expressões antes da chamada USR. Ocorrerá erro se 
houver mais ou menos do que 3 valores. 


Se utilizar cálculos mais complicados do que a adição, sub- 
tracção, multiplicação ou divisão, pode precisar de colocar 
cada coordenada ou o código do caracter entre parêntesis 
para que a rotina os distinga. 


Nesta rotina não lhe é permitido usar para a coordenada y 
valores inferiores a 7, desde que cada caracter contenha 8 
linhas. Um caracter na coordenada 0,6 tem a linha mais bai- 
xa na coordenada y mais pequena. Aparecerá a mensagem 
de erro «Integer out of range» se usar coordenadas verticais 
menores que 7 ou maiores que 175. 


PROGRAMA EXEMPLO (listagem 1) 


Apresenta uma bola a rolar pelo écran em várias velocida- 
des. Esta é posicionada usando «LET d = », e não RANDO- 
MIZE já que a sequência dos números «RANDOM» não é 
constantemente recomeçada sempre que a bola se mova. 
(Repare na linha 336 e certifique-se que usou vírgulas). 


O código máquina usa sempre o comando OVER 1 e assim 
qualquer caracter pode ser apagado sem ser destruido O 
fundo, simplesmente porque será logo recolocado 0 «dese- 
nho» no mesmo lugar. | 


O Spectrum usa normalmente códigos de caracteres entre 
165 e 255 para representar palavras-chave tais como THEN, 
PRINT, ... que não têm necessidade de «saltar» no écran. 
Esta rotina permite-lhe definir, em seu lugar, mais 91 gráficos 
UDG podendo assim contar com 122 caracteres (juntando os 
21 gráficos UDG standard). 

Em princípio os novos caracteres são definidos exactameni 
do mesmo modo que os anteriores, ficando sequencialmente 
na memória. Isto significa que precisa expandir a área UDG 
antes de definir os gráficos que irão para além dos 21 
standard. 

No Spectrum 48K, deverá utilizar os seguintes comandos 
para expandir essa área até 122 caracteres: 


CLEAR 64559: POKE 23675, 48 : POKE 23676, 252 


Os POKES ajustam a variável de sistema CHARS para 728 
(91 * 8) bytes adicionais. Como eles não reservam memória 
para código máquina é necessário O CLEAR 64500 e, por 
isso, terá de carregar a rotina no endereço 64500. 


No 16 K carregue o código a 31670 e reserve o espaço com. 


CLEAR 31669 : POKE 23675,48 : POKE 23676,124 
Estes gráficos assim definidos são colocados (poke: à 
normalmente em memória; a única diferença é que não pode 
usar a função USR. Os caracteres extra seguem-se com in- 
tervalos dde 8 bytes. Os gráficos UDG correspondentes a «a» 
tem o código de caracter 144 e é possível encontrar a sua 
definição com o código «N», introduzindo: 


PRINT USR «a» + 8 * (N-144) 


Para melhor compreensão da utilidade desta rotina, passe a 
listagem 1 e grave-a, certificando-se de que não foram co- 
metidos quaisquer erros. Ao fazer RUN, o programa ficará à 
espera da entrada da rotina em código máquina. 


A rotina entra nomalmente como a anterior, apenas com uma 
pequena diferença na gravação. 


Depois de completa e cuidadosamente introduzida, faça 
RUN. Prepare a cassette e o gravador para gravação e 
carregue numa tecla do Spectrum aquando da mensagem: 
«START TAPE AND PRESS ANY KEY». (Em caso de erro 
verifique de novo pela listagem). 


CLUBE Zgso 


Segue-se novamente a mensagem para gravação. Sem pa- 
rar o gravador accione qualquer tecla do Spectrum. Termina- 
da esta operação, tem duas gravações: a da rotina completa 
e a do código máquina. A primeira é apenas para permitir 
correcções sem o código máquina estar ainda instalado pois, 
nesse caso, não obteria a sua listagem. É exactamente esta 
2.2 gravação que deve entrar quando à chamada (LOAD » » 
CODE) da 1.º listagem. 


aro 


“AOVIMENTO EM PIXELES — Usando a rotina apresentada, 
obtém-se uma grelha de 176/256 pixeles em vez da normal 
colocação de um caracter. A 1.º figura mostra o salto de um 
caracter em bloco. A 2.º figura (à direita) apresenta o mesmo 
salto, mas de pixel em pixel, em 8 movimentos. 


LISTAGEM 1 — Programa exemplo 
1350 REN CARREGAR O CODIGO 
itã CLEDQR Gidas 
153 vOAD Chover CODE G4svu 
16) FEN geterihina area 
170 LE: xmax=247 
1502 E: Úumax=lba 
iõia JErmn cetermkina posições 
2a ET xpos=INT iRND+200) 
sl) LE. yposS=iro 
[2à LET xdir=INT iRNDSD+l) 
229 LET Úudir=-IMNT lLEND+5+11 
29 REM define as tola 
22à RESTURE 
22) FOR 1=U5kR “al TO USE e 
2“àú REBD da 
22) PODRE i,d 
259 NEX: 1 
300 LET shapezlad 
3142 INhk E: PAPER 2: BORDER 5 
32à FOR i=& TO Gi 
3350 PRINT RT 1,0, INVERSE À, 
so NEXT oÍ 
Sb SO TÚ 43) 
559 REM move a boia 
dv LE; oldx=:xpos 
ála LEI olLdyuzuyupos 
Szà LET xposS=zxpos+xdir 
42S IF xpos>1l THEN IF xpos<xmax 
THEN GO TO 440 


4su LEI xpos=oldx: LET xdir=INT 


ády LET UPos= =YPOosS+ydir 

das + yPpos: -* THEN IF ypos:cumax 
«7 THEN GU TO 459 

Sao LET yupos soldyu: LET uda rSINT 
(RND+S5+1) 4*-536N qdir 

ASS BEEP. .D3,30 

je) LES d=o o Ldx BND olLdy=zshape+lU 


pis, LET shape=shape+l-d+ishape= 
480 LET a=xpos AND yupos=shape+U 
or BáSUA 
459 GO TO 4a) 
599 REN definicao da bola 

Do ,65,135,143,145,159, 
126, 
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HiA 60,65,193,225,249,2583, 

ATA 60,126,249,241,141,225 

ATA 60,126,191,159,135,131' 
ATA Q 


LISTAGEM 2 — Rotina de movimento 


M MOVIMENTO 
U “Enderecov;l 


q 
) 
Tm 
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O 
Fr 
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po 
[o 
qc 


a 
dido 
“mM 


an a THEN PRINT “err 
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E ao do caracter 
“RANDOMIZ ZE x AND g=zc+ 


““gravar na sequencia 
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ut ps tes TO te D9 Co) DO E O TU DO fis + Ty ny O E 
Pot RO E O) DE JR 6) Gt Si o na 


EN ui Qu RN gu U- 


LILA D IT 


CS CD ED Qi Qui gi 
++ 


BH Je = 
Ul- 


DATA 196 
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ROTINA 3 — Listar todo o programa !!!292? 


Esta rotina pode entrar com um MERGE no seu programa, 
de modo a obter listagens a partir de e até determinada linha, 
não sendo necessária a listagem completa. 


Fr EN |) =PEEK x+256+%PEEK 
AE bd N nixi =25645PEEK x+P 
ix +1) 
Prog=EN Pp (23635): LET v 
FN p(23027) 
- PRINT "Listar Linhas” 
INPUT “à Linhas; LINE am: IF 
LEN a OR VAL aég<l OR VAL à 
G 9919 
r 


À 
AL ag: PRINT AT 


Mov + Dm 
+ 
o 


E > 

5915 LET sta =U 

e SENTO Sort 

9929 INPUT “ultima Linhaz':; LINE 
ag: IF NOT LEN ag OR VAL aú<li O 

R VAL ag,59999 THEN GO TO qG92 

5930 LEI stop=VAL ag: PRINT AT 2 

16; "Parart;stop 

5935 IF prog=vars THEN STOP 

9940 LET tiine=FN niprog) PRINT 

Si 4,05 “Linha”; Cine: LET Sengithes 

FN aoiprog+2): IF lLine<cxstart THEN 
LET 2rog=prog+Length+á: PRINT A 

T d,16;“Saltando”: GÓ TO 9935 

“9590 LF line>stop THEN STOP 

5955 PRINT AT 4 ;16; INVERSE 1,ºR 

SSENBLANDO" PRINT 

35969 DIM LE ULEngth+d): LET x=LEN 
TR& Line LET Lgid-x+1 TO 4)=5 


Line 


9955 LET Zz=5: FOR x=1 TO tength- 


3979 LET y=PEER iprog+3+x1: IF u 
=ld THEN LET x=x+5: LET Lgz=lgi T 
O LEN L5-6): GO TO 9980 
3975 LET Lgiz) =CHARS qd: LET Z=2+ 
59589 NEXT x: PRINT aT 4; 18; IMP 
a PRINT Agi TO Z=-d4: LPR 
NT 18t 40 Ze-ádi LET prog=prog+á 
Length: PRINT AT B.0; DUER 1; LL 
TO Zz-1i: GO TD 9935 


ROTINA 4 — Tens sintetizador de voz? 
Para evitar uma segunda pessoa para ler, por exemplo, uma 


listagem de código máquina, introduza esta rotina e confira 
com o Spectrum. 


12 LET j: LET de lau=190 

à DIM ta) POR =1 TÚ 2 
Q: READ NEXT à 

1d TI dereco inicial ss 
tart 

1190 nat “ijtinigh 

2a ct TO. tinish 

219 nts=PEEKR à 

220) R$ contents 

230 : ". contents 

24) 592,255 

282 : 


Autor: CARLOS M. B. MOR 
Porto 


Visto que o Spectrum não tira raízes de índice diferente de 
dois envio este programa que permite tirar raízes de qualquer 
índice e de qualquer número (mesmo com vírgulas). No en- 
tanto devido ao processo utilizado este programa torna-se 
muito lento ao trabalhar com uma grande parte decimal. 


18 DIM r&t(iIsdE: 
ao PRINT AT B,8;r": PLOoT O, Io 
: DRA 5,-24: DRAN = 


“4 
E 
4) 
A, 

DE 
pá 
E 
pi] 


Sê INPUT “r Cir 
7& INPUT “n “v; LINE n$ 
71 FOR e=1i TO LEN nã: IF néte: 


".* THEN GO TO 75 

72 NEXT e 

?3 LET n$=n$+"." 

25 LET ng=ng+" epepososescavoc 


s 
sapDPBPoBaRBaDDoDDBPCJCDPBLALDAA 
768 CLS 


300 FOR j=1 TO LEN b& 

319 LET cd=CODE b$(1) 

320 LET A A) Ap dE 

330 IF caiLEN ch)=0 O THEN LET 
ARG. TO LEN cêg-1): GO TO e fo 7. 

à?) LET bg=bEi2 TO) 

350 NEXT 4 

360 LET sg=c$ 

420) PAUSE delay 

410 NEXT à 
A il "Fim do boloco determ 
i 

s1Q INPUT “Mais? s/NnC;us: IF J&k 
="s" OR ug="5S" THEN GO TO JOW. | 
lovm DATA retessro, Won", (LTL 
do), (dth)r (ge), fowerC. Cf iii) 
vo, vsiks, "seven", taa) tur, tan) 
Cass inB) O. 


VENDO JOYSTICK E INTERFACE 
DA SINCLAIR EM OPTIMO ESTADO 
PREÇO A COMBINAR 


Contactar TIAGO RAMALHO 

Rua Clemente Menéres, 47-3.º D. 
4000 PORTO 

Telefone 319073 


pros LET bg&=STR$& LEN STRE ENT UR 

ag LET h=UAL b5 

1284 FOR n=-&8 TO des 

112 IF UAL STRE inPrI VPL ngta 
TO hi THEN GO TO IiSe 

128 NEXT n 

1360 LET n=n-i 

AS LET b=b+2 

1348 LET rã&ti TO LEN STRS mi =57T E 
5 Rn 

1ise LET rns=sLEN STR$& 5 

aa LET rgtrn+s+d)=]." LET roaros 

178 FOR n=ê TOS 

180 JF VAL itrêti TO LN 45185 mo: 
-rsUAL ngti TO bi THEN GO TO 28: 

1098 NEXT nn 

220 LET n=n-l 

218 LET b=b+ã 

cr LET rnernsã: LET rã&trr EA Tr 
= mn 

22S PRINT AT &,O;rgti TO FA 

227 IF rn=il HEN STOP 

230 GD TO 278 


Trad. e Adapt.: MÁRIO OLIVEIRA 
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Desde o aparecimento de JET SET WILLY que várias 
pessoas se esforçaram para descobrir o POKES que facili- 
tam Oo seu uso. 

Este programa contém alguns desses POKES. Depois de o 
introduzir, grave-o antes do último bloco do JET SET WILLY. 


serv o?: 
PRINT 


“P-escolher numero de 


LORD “CODE 
“i-vidas iltimst 


“S-escoltlher a numero 

Je obgectos” 
a JSErs “a-tirar q probtema cd 

o NT PIE” 
Sa PRINT 
Se PRINT 


a 


E gm -tirar Os bonecos” 
B-Fficar inwutneraver 


“2Z-nao morrer ao cair 
“"B-escrever o NRITETY 
“9-simplificar o BANY 
“Q-dar saltos gigante 


so PRINT “S-passar a imagem do 
“visor para qo gravador durante & 
vugo, basta premnir a tecta 5º 
Sad PRINT “I-permitir um funca 
— correcto com o Int 
Ligado” 

“d-terminar” 
&S IF INKEvy$=º1º THEN 


2 
52 IF INKEvS="D" THEN 
umero de vidas «<S2 “;v: 


ft ba 
E 


"66 PRINT 


39 


72 IF INKEvy$=º8" THEN INPUT “nn 
smero de objectos “;n: POKE 4198 


S.25A-n 
74 IF INKEvY&='4" THEN POKE 5995 
THEN POKE 551 


8,255 
.*6 IF INKEY$="5" 

“28 IF INKEY$="6" THEN POKE 348 
13,0: PORE gsdes,e. POKE 34811,€ 
PORE 24812,0: POKE a4814,8: PO 
E 34.815,80: POKE 37425,7. ÉOKE à 

064,4. POKE 40191,8 
-BO IF INKEvg="2" POKE 364 
POKE 34B 


8 
BB IF INKEY G="8" 
POKE 365 


3,18 
5a IF INKEYk="a" 
INKEY $S="0" THEM PDOKE 365 
QR INKEYg=]5" 


& IF INKEYg='s" 
THEN RESTORE 58S: POKE SOS53 . 135 


É i=35547 TO 5559: 
: PORKE i,a: NEXT i: DATA 
id 221,2829,221, Se: 237,255,2 
,;1785, 2os, 194, ,6,58, E e is 
ie, 8, 27,68, 554/4510 38, (64, 
ta, 243. 4281) 5555545 sé Tá 


2, 
ao" TÉ INKEV ge" à OR INKEv&="I" 
ThEN RESTORE So. POKE 35561 155 
POKE 35553, 255 


POKE 559592,2468: 


FOR i =655220 TO 65535: REAL a: 
180 i,a: NEXT i: DATR 197,33,2, 
Er ,90,1,80,1,2537,178,195,198 


ds DR ENKEY ES A 


3 IE INKEY &= 
FHEN RABNDOMIZE Úsa S379> 
18e É0 TO 


BS 


Autor: PAULO CASTELO 


Porto 
Lã Eri: RR PD O O A A O DE A E ADO O, AS OE ASSOC O AO SE ND A E AD E SS A E E E MA E 
2a REIM: ++. EA 
“aa REM: EE O HUMEROS PRETOS 25. E ME Lo: PS” HESBBTIST 3.4 
Sa RETÍ: AE | É 4 
se e E (Mi largas Paulo Castelo Eirp Tio HemBirair AD EX 
Edi frEfi: FE ++. 
O REM: FERERREEREEEREES EEE AA ARARIPE EA 
iai 
caçd 
LOM REI meme mma ao ma cs tt a e io re e e ie me me meme mo Tnjccialização dos Canais T 
110 REM: 
l2ã PENHA, O," CLS E DRESS, a, dg” 
134 PLUTHE, ZP NL 4 PRIHTEAS, 2ZL70),3L6];5069);" es 
1468 
LS REM meme mn ec a q e e e q ss a a q rs e q cn É Comentarios q 
168 REM: 
IPO REM: ,uasesamensesssas vos PRINT RA CO] ; cssccoo PRINT USING "-RARHOA UP; fas 
180-REM:..« PRIHMT MIDSC STR$C PES) 2,2,80; ,ccver«o PEIHT USING "RARRHRARO, P; 
13% 
OO REM ---m- emma emma meme mm meme] Inicializaçcao das Variaveis ] 
ela REM: 
ces CLEAR OPTIOMH BAGE 1º: H=4350A 
esa DIM Pet) PC o=> Prgoz3o 0 Prgo=5 Ped o= figos I=4 L=3 FE = 
2a PUT 31, 23,2, 181 
Eat 
BRA REED a e 7 ÃO Hz Primos q 


318 RETFI: 

29 Pa? : GOTO SS 

Rat P=P+& o: GOSUEB 4H 

Re q) P=P+4 o. GOSUB SH 

toa] P=P+2 : GÚSBUB 40H 

BM F=P+4 : GÓOSUB 43H 

AP P=p+Z o : GOSUB 430 

38 F=P+d o: GOSUE 454 

bed P=P+6 : GOSUE SSH 

SA P=P+2 o: GOSUE 4Gt . RETI: Esta sequencia taz com que Us Hez Tião 
418 GOTO Sa - REM: sejam multiplos de 2,3 & de 

448 

454 REM do ai cu E SA nas Da a e a cs a q q e e e Tezte se PP e' Primo ) 
gem REM: 


478 EP= TELE 
488 FOR I=4 TO EU 


428 T=P-PC Jo 
o (3] IE T=PCJo AHD J=kty THEN Rt=t+d 
1% TE T=INTCT) THEM J=k6 : EF= FALSE 


s2g HEXT 1 
=" IF EP GOSUE GBA : REM: E Frimãs 
ag PETURI 


ERA REM —-——— = ==="... em cm mem eme a aan Da E ES ms cao Gm ev eo seo amo ay pç e ie cmi paso e pr fa ed dimento para p' Erin e 
ELA REM: 
sea L=L+l c IF L=18 FRINTRS co L=60 0 F=E+l 

Eca TE F=564 PUTHS, 13,13, 13,13 0 F=hã 

Ega l=I+i . IF IM THEN Go 
EO PR E 

seo PRINTAS, MIgao STRéo Pisa. 
Pa PRINT CHBge Lo. TEA, Cor 
1 RE TURIM 


Porto 200 > à 4 . » 
Ro LET a=z45ã: LET p=394: GO SU 
1 REM Basic expansion 190 LET a=d66b: LET p=31: GO SUB 
à REM Novos Comandos- SOU 
200 PRINT “To use the extra com 
1. DRAW Absoluto mande, enter” 
+draw 129,130 210 PRINT ““POKE 23739, ";start- 
2. PRINT em alta Fesolucao 2S6+INT istart/256):": PORE 23/75 
print X,95€ 5B,“; INT istart:256) 
(x,y) =Coordenadas |, C=UDG a ser ae) 5Ti 
imprimido,A=z1,B=2,etc. São LET address=start+ra+id So» 
Se SLRULL 510 LET pointstoz=start+P p 
*SCrOLL n 520 POKE address, INT ipointsto- 
n=0 > ns1* n=2< nov 2561 
4. SUNS Ssagy POKE address-l,pointsto-256 
+zaP n +PEEK address 
n varia entre de az sig RETURN 
Ly CLEAR B4797 avo DEF FN hilafl =CODE agf-45-7+%1 
20 LET start=647985 ag>="A"] 
39 LET ag="" id DATA "D71890FE2AC2F00D1D720' 
42 FOR azstart TO start+555 1id1io DATA “DoE6B9FFELBSSVIAFS721' 
ea IF ag="'" THEN READ ag 1920 DATA “2DD305D04FDI9SESISDEB 
Bo POKE a,FEN hiaã) +16+FN h (agi 1930 DATA “E90774090FE20CSFESAUCS 
23) lado DATA "FEQD2PDF3CIFOBIFOVOIFO 
"0 LET ag=a6i3 TO |) 1250 DATA “01F22416305F2D1IFDAIFO 
so NEXT a igdp DATA “V1LFOBdIFOBDIFODIFDOLFO 
100 LET a=20: LET p=á5S: GO SUB iara DATA “91FODIFOBIFODIASDSFO” 
Su . ioga DATA "“B1FOBDILOBDIFODOLFDVOIFO' 
110 LET a=53: LET p=99: GO SUB 19930 DATA "B1F901FODI1FDOILDIDICD' 
sa) 11090 DATA '1FDBD782 1CFE2CU2F0DL 
120 LET az77: LET p=165: GO SUB 1119 DATA "D72099D76821000B705D7' 
sa 1129 DATA "Q4 1E2 17E50953814 1601 
130 LET a=83: LET p=257: GO SUB 1130 DATA "4d 7C05D5D794 1ED1C1217D' 
bd 48/4] ljdu DATA “'5C96535890ALED1LISDAIGFF” 
1jáQ LET àa=97: LET p=465: GO SUB 1159 DATA "ED4S LBESBLEFFED4SdAdFD?' 
soa 1169 DATA “"BAR24C3CiosCcDlIFDSD762' 
150 LEY a=100: LET p=31: GO SUB 1ii7ô DATA '1CFE2CC2F DO 1D7202000D7" 
5; 1180 DATA “B210CFE2CC2FÕVD1D72000' 
150 LET a=166: LET p=31: GO SUB 1159 DATA “D7821CCDB705D794 1ECB 
sda 1200 DATA "27CB27CB27 1600SF2A7B' 
170 LET a=268: LET p=31: GO SUB 19210 DATA “50C19E5D794 1EFSD794 1E' 
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J OU con 


papos 
3 3 no Ts po To no 
(E) ES (4 A E E) 

q 

1 

= 

D 


Cod o) TS Do od Tod OS o) Taj O 
Cs À EN Pe Cano 
ES 4 Cd E) Es E E) E 


papo ppp papos 


'ClLAFDISEDSFSCSD7RAZ2 
"FSESCS5D74DODD7DBOBEL ' 
"A6DIEBFIQEBBICCEBI3SCE 
“193020F97029371010513' 
“F13D29D9C3C1OSCDIFDS' 
“"D78210CCDB705D794 1EE6S' 
"“932392AFE21282CFED2aS: 
"“151386C3EC02 1004080706 ' 
'24CBLE2319FBS3D2VFSCS 
ClIOSSECOZIFFS7A7OS2a 
'CB1526B109FB3D20FSCSCI' 
VDI5A71190DIPOGAICSSEUS 
0332075266B24E5012200' 
"ELB9IDII3D2OFJOLQDOTFED" 
J2E35012002EDB2D10S3D" 
“20E9201E006009545D0120' 
VOEDSZEBEDBOCIIVCCOI 


Autor: ARMANDO BESSA 
Bragança 


Pequeno jogo que põe à prova os teus reflexos. 


mi o cursor da sua posição inicial (teclas 5, 6, 7, 8) 
eves controlá-lo de forma a percorreres toda a grelha até ao 


ponto de chegada assinalado em FLASH. 


Repara que tens apenas uma saída e o tempo é factor funda- 


mental da tua pontuação. 


Adapt.: 
Lisboa 


Educacional. Teste para os mais pequenos, resolução de 


operações. 


Quanto mais rápido for a dar a resposta, maior será a 


=000:. DIM afiZõsyIo 

ndo LADA E Ao d A 

g="'--Filih DE COLEITE-- 

q FOR E = im du 

+1 O fe92+381) =" 

Sana GRE =sir+ 

PONT23 TOSSE SER a 

TT iBND5151+53: LET amgif 
e f 


HUGO ASSUNÇÃO 


percentagem final. 


Ed 
M Eta fi 
ES 
D 
m 
Ee 


pai 
O NS LESSEE- 
q 
mM 
Dad 
pedi 


T n.a: 


mr 


ETR 
EE Dm 


GO 


REM ss + +++ 
INK q: Sana 5: 


INK E: 
SUB 


PRI 


BORDER 6: UC 
PAPER 4 
UU. 


-| 


J) 


Spa papo papão pap ope papa pot Dt popa 


| 
es 
pes = ECC CHE 


Re 


4 


coa 
a 


=| 


1 


po Pet ico PTE E EI 4 


A qn 


RJ 


E Ga a ES 


qi 


+: 
Ti= 


co 13 Ae 
nr O- REDE 


fu 
QAONGEO Nemo -] 


“e EC 
fórs fá nscs ro Ffuro- 


CT tidam Xi 


-j x 


t+ 
Prec mmoaDn tim Mmmmten-mmmnm.-- 
= 
< 
m 
Y 


JT Zr mm 


cd + es ig CO o AS M 


22,25,28.,3 
AT 


SOS ES GEWS- GONG NEI 


DATA "ED570620772510FCC3C1' 
DATA “D511FFS5S72603C553E0805S' 
DATA '"'3E07626B25ESD1I200DED ' 
DATA “E8D13D20F301000709ES' 
DATA “2122022EDBSD10S3D20EL' 
DATA “D1EVOGED42545D012000' 
DATA “D9EBEDBSCIIQCD2IDD4D' 
LATA “206200C35ADSCDIFDSD7S2' 
DATA “1CCDB7950D7941E8A728932' 
CATA “FED12309FED2280DFD36 ' 
DATA “D92AEFO1800121100918' 
LATA “D601FFFE2120181104090' 
DATA “SELOCSDSESFSD7BSVDSFA” 
DATA “ElDIC1093020F1C3CI0S" 
DATA “F33A435CoFoFoF2604 46 
DATA “2610FED3FEEE19087CBS" 
CATA “280392818FOFBC3CIOS" 


Zu e 


mm 
cobr 
“ 


Wa +- 
TT. -ppuDd 
CTitm Fri q. 
E 


ks 
dos 
a 2 O a Gi 


nd 
! 


is +11 4256 
; PAPER 2; B 


o LD ng 


Tt 
A 


“oUZ+ 
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Es,e 

8,10,16,15,23,28 

,3,13,21,26,27,28 
1 
1 


“o 


ow 


OO GO CONTA 
JEM Do Mor 


ou 


13 


14 


CLUBE Zso 


asa POKE 23517,9: INPUT AT 2,0; INT (RND+6); "BB" 
“Meta o seu nome. DEPOIS PRIMA 6320 BEEP .1,2+%TOT: LET TOT=TOT- 
“ENTER ; L IN DE E cada 28 gi L: BEEP .2,2%TOT: IF TOT=0 THEN 
300 REM +x+ SO TO 798 
5s1ilo PLOT 6,968: Au “ass, 2: DRAU 650 GO TO 42 
d,-1B: RAW -235,0: DRAU g,12 560 REM xxx 
320 FOR G=20 TO 240 STEP 15 60 LET TCs 
330 BEEP .,.0S, (65+60) «280: PLOT G, P «L,2+T0T: 
3da NEXT & 6) pg o -BRE 
354 FOR G=1 TO 29 STEP 2 580 IF TOT 
369 PRINT AT 190,6;*" 590 GO TO 
370 BEEP .02,29-G: NEXT G “0B REM xs 
580 PRINT AT 12,5; "META À RESPO “lo G0 SUB 
STAR CERTAS ; TAB S: "DEPOIS PRIMA * t20 FOUR G=0 TO -2+ iN 
ENTER“ «DL. INT iRND$G): PRINT K RND& 
Ss LET TOS): LET TESO.: LET TOT 2; AT 14 +RND+7,RND+31; Ê MEDA | 
=: LET Nai: T nQ=1 vão FOR G=0 TO 21: BEEP .02,1s- 
(88 SSUsé + JRR ++ dsssossist rode diodos andiasa SUAS 
HUS É ; &$86& a 
420 LET F=INTO (RND$S) " +59) NEXT É FADAS 
430 LET Fá=l"*" AND F=0)+(" AH 755 REM à à AiaeiaI ARAMES + + + 
NO F=li+it-“ AND F=2) "3 POKE 235 ;5252: INPUT “OUTR 
4d) IF F=0 THEN LET PRI=INT iRN RH VEZ TiSim ou Nao)"; LINE Ag: I 
adro LET. SEGSINT. IRND+12):. 60 O da “ THEN BEEP .5,-20: GO TO 
O 4? f 
459) LET PRI=INT i(RND+50): LET 5 TO IFP AGiL)="5" OR Aa lliets" T 
EG=INT iRND+50] MEN FOR G=za TO 21: BEEP ,02,246: 
6 Ra” F=2 AND PRI<SEG THEN GO tetmmp USR 3552: NEXT G: RUN 
UU 4s 
4d LET Fã=5TRã4 PRI+F4+STRE SEG . "50 IF AGUII<>"NO AND AgiI)<>"n 
4a PRINT AT 15,10,ºPergunta “; "THEN BEEP. .5,-20: GO TO 760 
o E.:csDBER à, CARS EE sy n 799 LET TE=INT TE LET TENENT T 
isa PRINT AT ES ER A rm = =. ve LET TPRSTE+TO LET B=R=-1: LET 
5do POKE 25517,240: POKE 25672, M=N-1: PRINT o O,0;: FOR M=10 T 
y: POKE 23573,0 U -G STEP -1: PRINT .,: BEEP .9D2 
SS INPUT “OUAL A RESPOSTA &" MM: NEXT M 
LINE Ag: LET T=i(PEEK 255672+256+P 3829 CLS PRINT TRE SB, INK 2;"“T 
EEkR 236731 -59 entouC; TAB 158; "Acertov"; TRAB 25; 
S1l4 IF CODE Aá<dã OR CODE A$>57 Falhou” 
THEN BEEP .3,-280. GÚ TO 595 3095 PRINT AT 2,9; "Numero"; TAB q 
528 PRINT PRINT INK 2; "RESPON :N;TAB 17: A; TAB 26;N-A; AT 4,0; "T 
DEU “; AS Sa empol;TAB O;TT;TAB 17;TC;TAB 26; 
Sa ERINT PRINT “AR RESPOSTA C 1ELAT 6,0; de ST 9,"-“" TAB 12 
ERTA EPC.UAL FÊ =: 4 INT (A:N+1000) “10; TAB 26; INT di 
siQ IF STRS UAL Fã:>A& THEN GO iN-RI /N$1000) 710, ta Cedo. T=A ST 
TO 560 AB 9;"-" TAB 17; INT (TOLTT + 1006) 
55) DSO TO EFA “10, TAB 26; INT (TE-TT +1000) “10; 
Seo REM + + +aSigaBadomnaada + ++ | D,07 T ZeNs TAB. 9; INT TT SNI 
St) LET N5N+41L:0- CET TESTE+T: PRI 3) +19; TAB 17; INT (TC/A+10) 210; TA 
NT RO; INK 4d; 0 RESPOSTA ERR 6 26,: IF N<>5A THEN PRINT INT CT 
RADAR" EziN-A) +10) «10 
580 FOUR G=19 TO -10 STEP -1 310 PRINT HK1;º ADEUS ";Ng: BEEP 
aaa BEEP .01,G: BEEP .9098,G-10D s;451" STO 
ABO NEXT G ] " 3999 POKE 235655,5.: POKE 23699,506 
blá IF TUÚT<1i THEN GO TO 650 : PFAPER 6: BORDER 6: INK 9: RUN 
b=o PRINT AT 18, i31-2*4TOTI): INK aa 


Programa que simula o JOGO DE DADOS e em que o Mota ic fg dE dj da 
existe valor de aposta, contra o banqueiro SPECTRUM. So INPUT ES 
Sl LEI P=P+1 
So S0 SUB 400 
D>REM Programa convertido pa lvo LET D=A+B 
ra à Specirumo 19S LET d=5 
1 50 SUB 70DO . | llo FRINT AT nt: as MUOCE:. "; 
3 BORDER 5: PAPER 5: INK B: U | GO SUB 6000: RÍNT prada 44 + 
e á TR Caes di site o PAPER 7. INK 2; 
S PRINT AT 2,8; PAPER 6, INK 113 PHUSE 250. ULS 
ia rE DD ma. “JOGO DE DADOS"; AT 115 iF P=530 THEN GO TO 421 
o. PAS ar l2o IF D>C THEN GO TO 160 
5 G0 SUB SHU 1a LET MeM=E 
1a CLS ldo LET N=N+Z 
15 LET nN=30 1854 GO TO da 
2a LET N=hk lbo LET M=M+Z 
3a CLS : LET Z=5 ld LET N=N-Z 
15 LET P=0 1382 GO TO dB 
ia GO SUB 300 320 PRINT AT 3,0; "UOCE TEM “; P 
so GO SLB 409 HPER 6; INK 1;  ESC.:C;M;: PRINT 
GB) LET C=H+B HT 6,15; PAPER 5; INK 0;"EU TENH 
ES LET j=D O 4 PAPER DB: INK 4; "ESB. CMN 
CO PRN o ed st) o Cro > 35 SS PRUSE GU 


40 RETURN 685 PRINT AT 5,14; "VOCE VENCEU. 
400 LET R=1+INT (RND45) [EM DIREITO A NOVOS 

405 LET A da L[RND +61 619 PRINT AT 8,0; “JOGO, ENTRAND 
410 LE; Ri=As O COM A VANTAGEM bo” 

415 LET Bil=B+ 1 615 PRINT ART 11,90; CUALOR JA GAN. 
je. RETURN nO. 

42 MizN THEN GO TO 428 bz) PAUSE 30) 

42 IF M>N THEN GO SUB 500 525 CLS 

ái2S GU TO 30 530 RETURN 

iz PAUSE 190 BODO LET tg=agiadl) 

40 ls ata Ha 6910 LE; ug=ag(bl) 

455 PRINT ,,é Terminou o seu te Bozo PRINT PAPER 6; INK 1:AT 19+ 
Ea aFuRuA” EO Lina atas bu J,4+J;tã(1 TO 3);4AT 1I+gj,d+rj;tgi 
| x | a TO 6);AT 12+j,4+J; LH(7 TO 8) 

450 LF L5=“5" THEN PRINT" De Soso SRÍNT ES BE, j 
VR UANS E Es cudos."”: PAUSE ig sem Pc So Pa NA ea 19 + 
i LDL); UBIIL T Jo L+4,10+4;U 
4585 IF N>M THEN PRINT 0" Tem a E J:AT 12+9,10+);0B(7 
EEE FLASH 1:N-50; “ Estudo Es TO 6):;:07T 12+4,190+g; VB? TO GS 
Sa: 9 e b209 RETUR ? 
400 IF M>N THEN PRINT CC Teh à 000 RESTORE SOLO 
receber ; FLASH 1;M-30,” Escud cu8s FOR p=0 TO ? 
08.": STOP a | 72102 READ a: POKE USR "B'+p,a 
a PRO Hi 3,0,” VOCE vai jog “D20 NEXT Pp 
ar CORISO. aus. Dados: "03 N agi?,9) 
510 PRANT ,," Eu, SPECTRUM, sou 9840 LET SG ili = | 
O banâuei dó, , | 7059 LET agiD)=" E ; 
315 PRINT ,,º Sempre que haja u “060 LEI agi3) ="B = 
a * E a "“V7D LET agid) ="B = 
000 RAMO sao PO pda CAN A 7080 LEI agiS)="B B BB 
à e qe 9 Estu",,” gosar 7099 LEY agiBla" 
525 PR SANTOS,“ 8,0 R à OR T E “108 CE (9) eb Es B6 ER 
“S30 PRINT “,," Prima uma Tecl dao RE 
a Va rima uha Tec 3000 DATA D.0,0,BIN D020112006,BIN 
ER “60110090, 0,0,0 
545 «NPUÍ Ls 59959 STOP 
Es à q aid 59599 SAVE “DADOS” LINE 1 


Tradução e adaptação: CLUBE Z 80 


Introduza a listagem no computador e faça RUN. A figura PA | | 
definida na linha 9000 DATA, passará por 4 Displays, com a x ? | | 
altura que lhe for atribuída logo no início do programa. ) A | | 

à ' L— 

1. ROTAÇÃO fm mf E 
“MA figura move-se 90º, numa série de saltos, antes / E á | 4 E 


especificados. 


2. DESENHO TRABALHADO 


1.º ângulo de projecção ortográfica, de frente, de lado e no 
plano. 


3. DIAGONAL 


Display das faces com as linhas a 45º. 


4. ISOMÉTRIC 


Display de todos os lados com os horizontes em 30º. 


Para jogar com o seu desenho dê entrada de uma linha 9000 
com as posições tal como numa statement DRAW e final- 
mente o n.º 1000 que significa o fim de DATA. Separa todos 
os números por linhas e dá inicialmente as coordenadas do 
canto inferior esquerdo. 


16 CLUBE Zso 
12 BORDER 1: PAPER 1: INK 7: U CRAW alt,O: NEXT 
Lã : RESTORE Sc AD A 25 PLOT pp, 13: FOR ASL- TO conL 
io DIM atlod,2): DIM biIDO!: L DRAW a (n,11,9: NEXT n: PLOT PP 
E pib Dad LET gi=s0. LET age: is A a: DAR EA bisgdo o 
=0. ain,1i,0: -alt:. 
So READ Cc: IF c=12000 THEN GU T AU Balt: NEXT n PRÉ ' 
o 61 E 294 INPUT “Copia 7 issn) “"; LIN 
Si LET al=al+c: IF alc<a2 THEN E kg: IF kg="5" THEN COPY 
LET ad=31. " SU) REM ps da al 
S2 IF al>a3 THEN LET a3=al 312 LET x=CÔS (PIválsialtç2): L 
. 62 LET contscomt+i: READ d: LE ET PR=120+comp 2d 
Lo SD nd ni LET aitcont,2i=d: E da CLS : PRINT AT 5,0; “Diagona 
3 ul Rai 
Bi LET comp=a33-as “320 PLOT pp,19: FOR n=1 TO cont 
BS REK rotacao : DRAW ain, 1) ,atn,2): NEXT n: PL 
co INPUT “Altura, em pixeis (az DOT »p,10: DRAU x,x: FOR n=1 TO 
-50 Pato E alta OR att>50 ont: DRAU ain, 1adin, 21: DRAW -x 
iMHEN GO TU 70 s-x: DRAU x,x: NEXT 
te CLS A 339 INPUT “Copia ? Ts sn) obs 
| ?S PRINT AT d,8; “Rotacional” E kh: IF Kg='8" E COPY 
INPUT “Numero de posicoes (l- 1? 433 REM isSometri 
pas: LET pos=INT pos: IF posta “5%a CLS : RESTORE 9000: PRINT * 
THEN UU Tú ?5 isonheitrical 
so LES pos=pos-l Sey DIM cisd,a!: LET cont=0 
te LET Ppp=i127+comp:2) -as d sos READ c: IF c=l0dd THEN GO T 
se FOR n=ô TO PI:2+.001 STEP P v Edu 
« "12 *+P0S) 
So FOR n=i TO cont: L do E São LET cont=tont+i: REBD d 
im 2) 608 nº NEXT aid a e Eae ci S40 LET Cicont,1)=C+COS (PI/6) 
| 65 LET a=iINT itiPI/2-ni 4 190/P LET cicont ,2)=d+i-C&SIN (PIZ6)) 0 q 
L+E/1 +100+.5/1 100 og 60 TO Sob 
1a CLS : PRINT “Angulo: “ia;" SlW PLOT 150,0 da Vais 
“; PLOT pPÊê,70: FOR wsl TO cont: deo FOR n=4 15. cont: DRA Cima 
DRA alm,il,Dlhj: NEXT m: IF n=0 a a A É 
CSN Er TO 200 . ção ezattsCos (PI/46): LET + 
l5ao Ei x=3.t+5IN nº: PLOT pr,7Q “Bd a . 
iuP RS O,-Ki FOR mal TO conti DE so FOR n=1 TO cont: DÉAU cin,1 
id a lm,i) ini: DRR ç: a a , 
a E A eo dos de pia jáCtn.2!: DRAW -e,-F: DRAU €,+: 
ava INPUT “Copia ? É: a 
ECky: IF et di + MEN 5BD INPUT “Copia ? is/n) “i LIN 
250 LEI PRSHES aBt10 506 FOR” 
a sd e OR n=2 TO 7: - POR 
«550 CLS o ERINT AT 0,8; “TRABALH SE E E NEXT no BATA 48,55 
RS LESEN v2,48,.0,0,0,0 ida 
ba PLOT pp,va: FOR n=1l TO cont iDSo PRINT TAB e E 
RAI almolisalno,dl: NEXT n Lo. PAUSE So: so! TO ÃO nisi 
“Bro PLOT 179,70: FOR n=1 TO con 32060 DATA -55,0,9,30,-15,-530,-15 
sã SRA Ba in,2 NEXT ni PLOT 1 a? a tc) TRE bd, E, 415,-18 30,6 
ca cd. LRN Gt l,i: OR nz: nx O: -B9,-20,0,-3, - 
ni: CRAW O,aim,2!: CRAN alto: a 1900 Pora» Pata Band do 


Trad. e adapt./CLUBE Z80 


Já pensou em obter uma mensagem ou instruções num jogo 
ou num utilitário na 23 linha do écran? Aqui tem essa 
oportunidade. 


O programa em código-máquina (list. 1) pode ser usado para 
apresentar um string em constante movimento (scroll) de um 
lado para o outro do écran. O Basic correspondente a esta 
rotina permite-lhe saber se cometeu qualquer erro na introdu- 
ção do código-máquina pelo número de linha. 


Assim que correctamente introduzido deve ser gravado com: 


SAVE «scroll» CODE 60 000,95 


É recomendada também uma gravação do Basic, de forma a 
ter acesso ao código-máquina para eventuais alterações. 


x 
* x 


Para iniciar a introdução da listagem 2 pode usar o comando 
NEW, já que o código-máquina estará presente e posiciona- 
do acima da RAMTOP. 

Terminada esta 2.º operação faça: RUN. 

(Deverá obter o scroll da 23.º linha do conteúdo de Z$, 
pixel/pixel). 

Para regressar ao BASIC, accione qualquer tecla. 


x 
* 


Para incorporar esta rotina nos seus programas, pode usar a 
subrotina (2.º listagem), definindo a sua mensagem em Z$, 
utilizando o comando GO SUB. 


“e. 


CLUBE Zso 


O código-máquina é totalmente recolocável, mas não deve 
ser carregado em endereços já ocupados. 


Se pretender o scroll da mensagem uma só vez, altere o 


valor 40 na linha 70 da 1.º listagem para 200. 


Se possui o Spectrum 16 K, adicione as linhas seguintes ao 


segundo programa Basic. 


15 RANDOMIZE (novo endereço) 


16 POKE 60001, PEEK 23670 : POKE 60002, PEEK 23671 


Deve alterar também o valor 59399 nas linhas 30 e 50 para o 


novo valor (novo endereço). 


NOTE: Quando Z$ é colocado em memória (POKE), é importante que o último 
endereço seja «POKED» com 0. Desta forma a rotina saberá onde é o 


( a fim da mensagem. Repara na linha 50 da 2.º listagem. 


3,7,232,34,0,91,24,40 
6,6, 197,6,255,16,2 


Ci 
(ul 


| 
fu T- Tiqnry 
fo pi) 
NDO TDT 
E fun 


17 


So DATA 5, 92, 234,0,192,42,0, 
Es DATA O, 91 ão 
; 1 126,254,0,49,189, 
Re 7. 
18, 61,32,252,17, 
ao BATA co tu 


D DATA 23? , 160,27,20, 121,254, 
95 CLEAR 5595 
116 FOR nitao 
n= VD TO 59991 
l20 READ z 
13) IF z>255 THEN LET d=b: LET 
b=0: IF z<>d THEN PRINT “ERRO NA 
LINHA “5 (INT (iN-GDODO) 210) ) 410 
li) IF n=60091 THEN STOP 
150 IF z>255 THEN GO TO 120 
L6) POKE n,z 
170 LET b=b+z 
180 NEXT n 
Listagem 2 
lo LET z$="'QUALQUER TECLA PR 
a6En0S sP OR ONE Pons PoREEE 
RE OR. CLA USADA - PEE 
=) FOR n=l TO N 


= n= Ls 
SQ PÚKE 59399+n, CO Ê Z&ini 


BB RANDOMIZE USA BLOGO 
“O PRINT “ESSA TECLA TEM O COD 
' "“+PEEK 293560; 


Esc. 1696$50 


“Rê COMO OBTER O SOM DO SPECTRUM DIRECTA- 


MENTE NO SEU TV, ATRAVÉS DO CABO DA ANTENA. 


1. GERAL 


O ZX-Spectrum possui notáveis qualidades gráficas, o que 
lhe permite executar programas de jogos, e outros, com 
grande realismo. No entanto, as também boas qualidades de 
programação de som não são devidamente aproveitadas. 
A saída de som faz-se por um pequeno altifalante interior, 
dificilmente audível. 


O módulo Specsound, montado no interior do seu Spectrum, 
destina-se a resolver este problema, modulando a sub- 
-portadora de som do canal TV do Spectrum com a informa- 
ção sonora produzida pelo programa. Assim terá quer a ima- 


gem quer o som no aparelho TV, podendo controlar o volume 
de som da forma usual no seu aparelho. 


Os acessórios externos, para ligar à ficha traseira do Spec- 
trum, que também se encontram no mercado, são mais com- 
plexos e incómodos, para além de mais caros, nunca che- 
gando a produzir a qualidade sonora desejável. 


3. MÉTODO DE INSTALAÇÃO 


A instalação do Specsound no interior do seu Spectrum deve 
ser efectuada por uma pessoa com um mínimo de expe- 
riência em trabalhos deste tipo. É no entanto simples, pois 
apenas inclui a soldadura em cinco pontos do circuito 


impresso. 


NOTA: Recordamos que a abertura do seu Spectrum, caso este 
esteja ainda no prazo de garantia, tornará esta inválida. 
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CLUBE Zso 


CAS FANHO 
R35 PRETO 
10 KA ZARANTA 
DovasnDo 


Autor: MANUEL QUINAZ 
Porto 


MODULADOR Correspondendo à sugestão do Hugo Assumpção, recebe- 


mos uma resposta ao desafio proposto — criar um programa 
que permita calcular a área de um paralelograma rectângulo 
inserido numa circunferência, dados unicamente o raio desta 
e um dos lados do paralélograma. 


CASTANHO 


pinça À A listagem do programa que publicamos a seguir é da autoria 
VERMELHO 
ip á de Manuel Quinaz/Porto. 
(+12 V) 
ISSUE 2 
R3$ CASTANHO 
To SAM NTA 
DovasDo 
EAR mM re 
esa a 
ms 4 ue 
MODULA DOR DOI 
O ade 
o T le 4 
Rs2 E+ Teft 
E, +O- S (0) ULA 
CASTANHO e 
Preto E 
VERMELHO ] 
DovrgavoO |( A 
Z 
ea EEE 
Ed a 
ISSUE 3 12 CIRCLE 100,1090,70 
20 PLOT S2,iSá: DRAW 96,0 
FIGURA 1 Bu E E Q,-199: DRAW -96,0: DR 
42 PLOT 199,1900: CRAWU 43,-50 
sQ PRINT AT 8,12,"0": PRINT AT 
EAR MIC 11,12; Cr=7"; CARS 8;: INPUT “r=" 


PRINT Tr 
Bo PRINT AT 2,190;/a=7"; CHR$ SB, 
INPUT “az=";a: PRINT a 
6S IF áxzrirt2i cata THEN INPUT “ 
8 1 
+ 


“ue 
—, 
' 


Erro nos dados.Conia ndetermi - 
rodado [Prima ENTER]; LINE ag: R 


BS IF 4+irt2) =at2 THEN INPUT * 
nao ha paralelogramao inscrito 
na Circunferenci Prima ENTER) “ 


E) 
79 LET b=SOR tá 


SPECSOUND 


girt2) -atê) 
So PRINT AT 7,19; "b=";b 
So PRINT AT 19, Q;"'r=Raio da cai 
rcunferencial““azLado do parallel 
ogramo""“b=lado do paralelLogramo 
QB; 


1204 PRINT HB; AT q. “ozcentro ad 
E circunferencia" “Area=sbãa="; bs 


MODULA DOR 
Õ 
a 


FIGURA 3 1320 PAUSE 1: PAUSE Q: RUN 
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CLUBE Zso 


e SHERLOCK HOLMES — Trata-se de uma das melhores aventuras para o Spectrum, que apareceu após a inesquecível «The Hobbit». Desta 
vez, a personagem celebérrima de Sherlock Holmes tem que resolver um dos seus mais movimentados mistérios policiais. As instruções 
para a execução deste programa são as normais para qualquer tipo de aventura do género; com a diferença de que esta aventura aceita 
cerca de 1500 vocábulos !!! 


e B.C.BILL— B.C. BILL é um jogo que se passa na idade da pedra. Você é BILL, um homem das cavernas e tem que se defender dos 
inimigos para arranjar comida e mulheres. Deverá para isso andar à cautela e levar as presas para a sua caverna. B. C. BILL tem além 
de tudo a qualidade de um jogo do Imagine Software sendo dos melhores do género. Quando acabar de fazer o LOAD deverá carregar 
em qualquer tecla para escolher entre Joysticks ou teclado. Conforme a sua opção carregue no número correspondente e para confirmar 
accione Y. 


TECLAS: Q — subir; A — descer; 1 — tacada; M — esquerda; N — direita. 


e AVALON — É um jogo que combina a aventura com a acção, de uma forma que precisa de pensar, de desenhar um mapa e ao mesmo 
tempo agir, pois os inimigos vão-lhe roubando energia. Vai encontrar cerca de 200 salas, túneis e caves em 8 níveis, que deve explorar para 
derrotar o senhor do CAOS. Aparecem objectos e feitiços que o poderão ajudar. Algumas portas não se abrem sem chave, outras permane- 
cem invisíveis até resolver um determinado problema. Na parte inferior do ecran pode ver a qualquer momento os objectos e feitiços que 

P. possui. O programa pode ser jogado com Joysticks. 


e TIME BOMB — A nossa missão é desactivar as bombas relógio, existentes no écran, antes que o tempo chegue ao fim. Se a bomba relógio 
não for desactivada a tempo, ela explodirá provocando uma morte lenta e dolorosa. Não se pode passar duas vezes pelo mesmo sítio e tem 
que se evitar os SKULLS (pr.nível) e as botas (níveis mais avançados). Podemos seleccionar os níveis de dificuldade, bastando para isso e 
antes do jogo começar, carregar na tecla de 1 a 5, consoante se quiser um nível fácil ou difícil, respectivamente. 


TECLAS: Q — subir; Z — descer; | — Esquerda; P — direita. 


e SPACE COMMAND — Neste jogo, temos que defender uma base contra diversos inimigos e perigos; naves, meteoritos, alienigenes, etc.... 
Temos também que evitar que a nossa nave choque com esses objectos e para os destruir, devemos disparar o laser de que dispomos a 
bordo da nave. Há diversos níveis de dificuldade e uma variedade considerável de écrans. O programa é compatível com Joysticks ou 
teclado. Através da tecla G o programa fornece a demonstração de vários níveis. 


TECLAS: SPACE — fogo; CAPS — descer; M — esquerda; S — Recomeçar; Z — subir, SYMBOL — direita. 


e JUMP CHALLENGE — Neste jogo você tem que dar saltos, com uma bicicleta e depois com uma moto por cima de carros e obstáculos. 
Para se poder classificar tem que saltar primeiro com uma bicicleta, podendo escolher a distância que terá que percorrer até à barreira. Para 
isso basta carregar em 'CAPS SHIFT", que serve para acelerar, e depois de deixar que a bicicleta que deve carregar em 'A', que é o sinal 
que tem que dar ao computador para que se comece o salto. Depois de 'A' devemos carregar outra vez em 'CAPS' para acelerar e saltar. A 
bicicleta para saltar todos os obstáculos, deve ir no máximo de velocidade. Depois vem a vez da moto. O procedimento para o caso da moto 
é análogo, tendo apenas mais teclas para o funcionamento: a tecla 'Z' que actua como sendo o travão, a tecla 'SIMBOL SHIFT" que serve 

4. para deslizar um “cavalo” (salto da mota e o seu andamento apenas sobre a roda traseira) e a tecla 'SPACE' que serve para fazer os 

cavalos. Atenção, você só tem uma vida, por isso evite cair com a mota. BOA SORTE. 


TECLAS: A — Preparar para o salto; Z — Travar; CAPS — Acelarar, SYMBOL — Desfazer o 'cavalo”, SPACE — Fazer 'cavalo'. 


e DANGER MOUSE — Neste jogo, que é uma reprodução de uma série de desenhos animados americanos, você vai encarnar a personagem 
de DANGER MOUSE, um rato que se põe ao serviço do bem-estar da humanidade. 
Para isso, ele possui vários apetrechos, que vocês podem utilizar, desde que as utilizem tão bem como o próprio DANGER MOUSE. O jogo 
tem dois níveis de dificuldade: o fácil, para principiantes, e o profissional, para DANGER MOUSES experimentados. O jogo tem também três 
quadros diferentes. No primeiro, temos que eliminar os inimigos que vêem contra nós, bastando para isso pôr-nos à frente deles. No 2.º 
temos que atravessar um lago com um crocodilo saltando por cima do mesmo e passando à continuação do 2.º quadro em que temos que 
escapar às terríveis aranhas gigantes e a um enorme cão. No 3.º quadro temos que apagar as lâmpadas que se vão acendendo à nossa 
frente, bastando para isso saltar para as que estão imediatamente à nossa frente e mais próximas. Se passarmos os três quadros, teremos 
salvo o mundo, e voltamos ao início do jogo, para mais uma aventura. 


TECLAS: (Nível 1): 8 — subir; 9 — descer. (Nível 2 e 3): O — saltar. 1 — esquerda; 2 — direita. 


NOTA: Este jogo é especialmente aconselhado para crianças. 


e MONTY MOLE — Neste jogo, você tem que descobrir os pedaços de carvão de pedra necessários para conseguir destruir e eliminar todos 
os perigos, armadilhas, seres e objectos que for encontrando e, no final, conseguir vencer os seres que dominam a ponte (logo no 1.º 
quadro), reparar a ponte e atear fogo ao caldeirão do outro lado da margem. Cuidado com as armadilhas existentes na passagem de um 
quadro para o outro. Evite os objectos que encontrar (excepto o carvão e outros que lhe darão energia), tais como spray, prensas, etc.... 
Para subir nas cordas, ou em patamares basta carregar na tecla para saltar. 


TECLAS: Q — subir; O — esquerda; M — saltar; A — descer; P — direita. 
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* DECATHLON - DIA 2 — Trata-se de um programa que simula algumas das provas mais interessantes do Atletismo. Consiste na continuação 
do Dia 1 (Decathlon) com as provas de 110m barreiras, salto em altura, lançamento do disco, lançamento do dardo, etc.. 
COMANDOS: > H — pe esa.; M — pe dir.; Symb. Shift — saltar e lançar. 

POLE POSITION — Este programa é uma réplica da famosa máquina de «ATARtI». O jogo consiste em conduzir um carro de fórmula 1 ao 
longo de um circuito, sendo a 1.º volta para classificação e distribuição dos oito lugares na grelha de partida. Depois da 1.º volta (de 
classificação) e de serem distribuidos os lugares, temos que percorrer o circuito mais 4 vezes, finda as quais nós poderemos, ou não, entrar 
para a tabela de pontuações máxima. Sempre que completarmos uma volta, recebemos um bónus em tempo. O jogo só acaba se se acabar 
o tempo. 

TECLAS: P — Direita, A — Velocidades: S — Começar; O — Esquerda; Q — Travar. 

KOKOTONI WILF — Jogo de aventuras, no qual temos que guiar o KOKOTONI, um lendário homem com asas, através de vários cenários, 
evitando todo o contacto com outros seres e animais pré-históricos, ao mesmo tempo que se vai recolhendo item nos vários quadros. O 
máximo de item (1 por quadro) e guiar o KOKOTONI para o centro da terra, onde ele habita. 

TECLAS: 6 — esquerda; 1 — voar; 7 — direita. 

e DRILLER TANKS — O objectivo deste jogo e o de limpar o túnel, bastando para isso passar com a escavadora por ele. Temos que evitar os 


MAMMUTS e os SKORKS, e que eles atinjam o palácio. Podemos destruir tanto os MAMMUTS como os SKORKS, desintegrando-os. 
Cuidado, se os MAMMUTS atingirem o palácio, seremos totalmente destruídos e perdemos o jogo. Se um SKORK se atravessar à nossa 


frente, teremos o caminho obstruido. O jogo e compatível tanto com o Joystick como com o teclado. 


MACHINE CODE TUTOR (800800) — Este programa, procura 
numa série de ligações progressivas, explicar e exemplificar a 
aplicação das instruções referentes ao microprocessador Z80, 
com a particularidade de permitir entrar nos exemplos, sem ocor- 
rer o crash do sistema. As lições são apresentadas em 4 blocos 
que deverão ser carregados cada um por sua vez, usando para 
isso a última opção de cada MENU. Assim: 


1.º Lição (1-9) 

. Registos e memória 

. Simples instrução de carregamento (LOAD) 
. Par de registos 

Endereço indirecto 

A adição e o carrey flag 

. À subtracção e o carry flag 

. Incremento e decremento 

Flag O 

. Comparação 


+ 


voNDrwUN 


2º Lição (10-17) 


Nesta lição, pretende-se ilustrar a diferença entre o computador 
e a calculadora. 


10. Saltos condicionais e incondicionais 
11. Saltos relativos 

12. O stack 

13. Chamada de subrotinas 

14. Notação binária 

15. Notação hexadecimal 


16. Código binário — notação decimal 
17. Notação positiva e negativa 


3.º Lição (18-25) 


Este grupo trata da manipulação do bit e a sua aplicação nas 
operações flag e nos rápidos métodos de multiplicação. 


18. Paridade 

19. O registo Flag e AF 

20. Flags S e P/V em instrução 
21. Manipulação do bit 

22. Instruções lógicas 

23. Instruções shift 

24. Instruções rotativas 

25. Rotação decimal 


4.º Lição (26-35) 


Neste bloco são apresentados mais registos e instruções e como 
o Z80 contacta com o exterior. 


26. Índice de registos 

27. Colocação dos registos 

28. Instrução INPUT/OUT PUT 

29. Bloco de instruções 

30. Bloco de transferência de instruções 
31. Bloco de procura de instruções e 
32. Bloco INPUTT/OUT PUT de instruções 
33. Processador de controlo de instruções 
34. Interrupção 

35. Final 


JOÃO MARQUES / Barreiro 

Faço um reparo em relação aos termos usados na vossa 
circular, em que alertam para o fim da assinatura, concreta- 
mente o 1.º parágrafo. 


CLUBE Z80 


Nem sempre quem escreve uma circular usa os termos mais 
simpáticos ou diplomáticos. Nunca nos passou pela mente 
chamar a atenção dos assinantes do jornal para o facto do 
fim da assinatura ter chegado, em termos que não fossem 
muito convenientes. De qualquer modo as nossas deculpas. 


JOÃO MARQUES / Barreiro — SUGESTÃO 


Não será possível irem publicando os índices dos números 
atrasados da revista? Isso iria permitir aos sócios mais recen- 
tes terem uma ideia de quais os números que eventualmente 
lhes podem interessar. 


CLUBE Z 80 
Faremos os possíveis para corresponder à sua sugestão. 


ARMANDO BEÇA / Bragança 

Ando a fazer um jogo que necessita de saber se foram primi- 
das várias teclas ao mesmo tempo e quais foram essas 
teclas. Alguém me poderá indicar um processo de conseguir 
esse efeito usando a linguagem máquina? 


CLUBE Zs0 
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Temos sido regularmente solicitados a explicar o que é o 
interface RS 232 e qual o seu interesse. Espanta-nos por 
vezes que inclusive, pessoas ligadas à comercialização de 
equipamentos e microcomputadores não tenham o conheci- 
mento simples e imediato para explicar ao utilizador e cliente 
o interesse em possuir esse tipo de interface. Para ajudar 
uns e outros, segue-se a explicação. 

O circuito electrónico RS 232 foi originalmente desenhado 
para permitir aos computadores, receber ou enviar dados, 
através da linha telefónica e usando um MODEM. 
Todavia, actualmente observa-se com muita frequência, a li- 
gação directa entre dois ou mais computadores, e entre estes 
e diversos tipos periféricos como impressoras, traçadores de 
gráficos (plotters), etc., tendo como tradutor destas ligações o 
interface RS 232. 

O chamado standard RS 232, manifesta-se de diversas 
»ormas, de acordo com o projectista ou fabricante e pode 
tornar-se numa tarefa difícil e tediosa estabelecer pela pri- 
meira vez a comunicação entre dois equipamentos diferen- 
tes, embora ambos possuindo ou sendo equipados com RS 
232. 

Veremos então (e recorrendo aos estudos do Eng. António 
Fonseca) os problemas básicos, encontrados na tentativa de 
estabelecer esse tipo de comunicação. 

O standard ou padrão RS 232-C refere-se a dois tipos de 
equipamento: 


1. Data Terminal Equipment (DTE) 
2. Data Comunications Equipment (DCE). 


À partida temos de admitir que quer o terminal (habitual- 
mente o DTE) e o MODEM (normalmente o DCE) possuem o 
mesmo tipo de ficha DIN 25 pinos ou DIN 9 pinos. 

MODEM . .. anagrama de MOdulador DEmodulador = modu- 
lador - demodulador de circuitos telefónicos separados, cada 


"um dos quais contém um ou mais canais telefónicos. 


| 


TxD saida 


Z ana e £ 
RxD entrada 
DTE 
1 ES q DEE 
pa GND massa 
ires E rem ? 


A figura acima mostra como q DTE transmite os dados desde 
o pino 2, enquanto o DCE recebe os mesmos também no 
pino 2 — por isso essa linha recebe o nome de TxD ou seja 
Tranmit Data ou transmissão de dados. 

Entretanto, no pino 3 são recebidos dados no DTE e o dispo- 
sitivo DCE transmite esses mesmos dados através do pino 3 
— por isso essa linha chama-se RxD ou Receive Data ou 
recepção de dados. 


Isto torna-se de certo modo confuso, e origina uma encrenca 
de todo o tamanho quando os pinos e os dispositivos estão 
classificados de modo que não sabemos designar qual o 
DTE e qual o DCE. 

Infelizmente, alguns fabricantes insistem em designar os 
seus computadores como dispositivos do tipo DCE enquanto 
na documentação de outros, a classificação é de dispositivos 
tipo DTE. Isto obviamente dificulta a ligação das portas série 
em cada equipamento. 

Se uma porta (ficha de saída/entrada) estiver configurada 
como DCE terá as designações que chamamos SERt1, en- 
quanto que se estiver designada como DTE será a lista agru- 
pada como SER2 que interessa anotar. 


SER 1 SER 2 
PINO NOME FUNÇÃO PINO NOME FUNÇÃO 
1 GND massa ou terra 1 GND massa ou terra 
2 TxD entrada 2 TxD saída 
3 RxD saída 3 RxD entrada 
4 DTR pronto p/ entrada 4 DTR pronto p/ saída 
5 CTS pronto p/ saída 5 CTS pronto p/ entrada 
6 + 12 volt 6 + 12 volt 


nota: DTR = terminal de dados pronto 
CLS = limpar para enviar 
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